home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 22 / AMUG_22-1.ISO / Files / Util / Network / ServerPower 1.0.sit / ServerPower 1.0 / source / ShowInitIcon.c < prev    next >
MacBinary  |  1995-12-23  |  6.8 KB  |  [TEXT/CWIE]
open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sat Dec 23 14:51:20 1995, modified Sat Dec 23 14:51:20 1995, creator 'CWIE', type ASCII, 6159 bytes "ShowInitIcon.c" , at 0x188f 456 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% dearkID deark: macbinary default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[CWIE]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 53 68 6f 77 49 6e | 69 74 49 63 6f 6e 2e 63 |..ShowIn|itIcon.c|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 18 0f 00 | 00 01 c8 ad 02 0e 38 ad |........|......8.|
|00000060| 02 0e 38 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..8.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 04 78 00 00 |........|.....x..|
|00000080| 2f 2f 20 53 68 6f 77 49 | 6e 69 74 49 63 6f 6e 20 |// ShowI|nitIcon |
|00000090| 2d 20 76 65 72 73 69 6f | 6e 20 31 2e 30 2e 31 2c |- versio|n 1.0.1,|
|000000a0| 20 4d 61 79 20 33 30 74 | 68 2c 20 31 39 39 35 0d | May 30t|h, 1995.|
|000000b0| 2f 2f 20 54 68 69 73 20 | 63 6f 64 65 20 69 73 20 |// This |code is |
|000000c0| 69 6e 74 65 6e 64 65 64 | 20 74 6f 20 6c 65 74 20 |intended| to let |
|000000d0| 49 4e 49 54 20 77 72 69 | 74 65 72 73 20 65 61 73 |INIT wri|ters eas|
|000000e0| 69 6c 79 20 64 69 73 70 | 6c 61 79 20 61 6e 20 69 |ily disp|lay an i|
|000000f0| 63 6f 6e 20 61 74 20 73 | 74 61 72 74 75 70 20 74 |con at s|tartup t|
|00000100| 69 6d 65 2e 0d 2f 2f 20 | 56 69 65 77 20 69 6e 20 |ime..// |View in |
|00000110| 47 65 6e 65 76 61 20 39 | 70 74 2c 20 34 2d 73 70 |Geneva 9|pt, 4-sp|
|00000120| 61 63 65 20 74 61 62 73 | 0d 0d 2f 2f 20 57 72 69 |ace tabs|..// Wri|
|00000130| 74 74 65 6e 20 62 79 3a | 20 50 65 74 65 72 20 4e |tten by:| Peter N|
|00000140| 20 4c 65 77 69 73 20 3c | 70 65 74 65 72 40 6d 61 | Lewis <|peter@ma|
|00000150| 69 6c 2e 70 65 74 65 72 | 2e 63 6f 6d 2e 61 75 3e |il.peter|.com.au>|
|00000160| 2c 20 4a 69 6d 20 57 61 | 6c 6b 65 72 20 3c 4a 57 |, Jim Wa|lker <JW|
|00000170| 57 61 6c 6b 65 72 40 61 | 6f 6c 2e 63 6f 6d 3e 0d |Walker@a|ol.com>.|
|00000180| 2f 2f 20 61 6e 64 20 46 | 72 61 6e 8d 6f 69 73 20 |// and F|ran.ois |
|00000190| 50 6f 74 74 69 65 72 20 | 3c 70 6f 74 74 69 65 72 |Pottier |<pottier|
|000001a0| 40 64 6d 69 2e 65 6e 73 | 2e 66 72 3e 2c 20 77 69 |@dmi.ens|.fr>, wi|
|000001b0| 74 68 20 74 68 61 6e 6b | 73 20 74 6f 20 70 72 65 |th thank|s to pre|
|000001c0| 76 69 6f 75 73 20 53 68 | 6f 77 49 4e 49 54 20 61 |vious Sh|owINIT a|
|000001d0| 75 74 68 6f 72 73 2e 0d | 2f 2f 20 53 65 6e 64 20 |uthors..|// Send |
|000001e0| 63 6f 6d 6d 65 6e 74 73 | 20 61 6e 64 20 62 75 67 |comments| and bug|
|000001f0| 20 72 65 70 6f 72 74 73 | 20 74 6f 20 46 72 61 6e | reports| to Fran|
|00000200| 8d 6f 69 73 20 50 6f 74 | 74 69 65 72 2e 0d 0d 2f |.ois Pot|tier.../|
|00000210| 2f 20 54 68 69 73 20 76 | 65 72 73 69 6f 6e 20 66 |/ This v|ersion f|
|00000220| 65 61 74 75 72 65 73 3a | 0d 2f 2f 20 2d 20 53 68 |eatures:|.// - Sh|
|00000230| 6f 72 74 20 61 6e 64 20 | 72 65 61 64 61 62 6c 65 |ort and |readable|
|00000240| 20 63 6f 64 65 2e 0d 2f | 2f 20 2d 20 43 6f 72 72 | code../|/ - Corr|
|00000250| 65 63 74 6c 79 20 77 72 | 61 70 73 20 61 72 6f 75 |ectly wr|aps arou|
|00000260| 6e 64 20 77 68 65 6e 20 | 6d 6f 72 65 20 74 68 61 |nd when |more tha|
|00000270| 6e 20 6f 6e 65 20 72 6f | 77 20 6f 66 20 69 63 6f |n one ro|w of ico|
|00000280| 6e 73 20 68 61 73 20 62 | 65 65 6e 20 64 69 73 70 |ns has b|een disp|
|00000290| 6c 61 79 65 64 2e 0d 2f | 2f 20 2d 20 77 6f 72 6b |layed../|/ - work|
|000002a0| 73 20 77 69 74 68 20 53 | 79 73 74 65 6d 20 36 0d |s with S|ystem 6.|
|000002b0| 2f 2f 20 2d 20 42 75 69 | 6c 74 20 77 69 74 68 20 |// - Bui|lt with |
|000002c0| 55 6e 69 76 65 72 73 61 | 6c 20 48 65 61 64 65 72 |Universa|l Header|
|000002d0| 73 20 26 20 43 6f 64 65 | 57 61 72 72 69 6f 72 2e |s & Code|Warrior.|
|000002e0| 20 53 68 6f 75 6c 64 20 | 77 6f 72 6b 20 77 69 74 | Should |work wit|
|000002f0| 68 20 6f 74 68 65 72 20 | 68 65 61 64 65 72 73 2f |h other |headers/|
|00000300| 63 6f 6d 70 69 6c 65 72 | 73 2e 0d 0d 23 75 6e 64 |compiler|s...#und|
|00000310| 65 66 20 53 79 73 74 65 | 6d 53 69 78 4f 72 4c 61 |ef Syste|mSixOrLa|
|00000320| 74 65 72 0d 23 64 65 66 | 69 6e 65 20 53 79 73 74 |ter.#def|ine Syst|
|00000330| 65 6d 53 69 78 4f 72 4c | 61 74 65 72 20 31 0d 0d |emSixOrL|ater 1..|
|00000340| 23 69 6e 63 6c 75 64 65 | 20 3c 4d 65 6d 6f 72 79 |#include| <Memory|
|00000350| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 52 65 |.h>.#inc|lude <Re|
|00000360| 73 6f 75 72 63 65 73 2e | 68 3e 0d 23 69 6e 63 6c |sources.|h>.#incl|
|00000370| 75 64 65 20 3c 49 63 6f | 6e 73 2e 68 3e 0d 23 69 |ude <Ico|ns.h>.#i|
|00000380| 6e 63 6c 75 64 65 20 3c | 4f 53 55 74 69 6c 73 2e |nclude <|OSUtils.|
|00000390| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 22 53 68 6f |h>.#incl|ude "Sho|
|000003a0| 77 49 6e 69 74 49 63 6f | 6e 2e 68 22 0d 0d 2f 2f |wInitIco|n.h"..//|
|000003b0| 20 59 6f 75 20 73 68 6f | 75 6c 64 20 73 65 74 20 | You sho|uld set |
|000003c0| 53 79 73 74 65 6d 53 69 | 78 4f 72 4c 61 74 65 72 |SystemSi|xOrLater|
|000003d0| 20 69 6e 20 79 6f 75 72 | 20 68 65 61 64 65 72 73 | in your| headers|
|000003e0| 20 74 6f 20 61 76 6f 69 | 64 20 69 6e 63 6c 75 64 | to avoi|d includ|
|000003f0| 69 6e 67 20 67 6c 75 65 | 20 66 6f 72 20 53 79 73 |ing glue| for Sys|
|00000400| 45 6e 76 69 72 6f 6e 73 | 2e 0d 0d 2f 2f 20 2d 2d |Environs|...// --|
|00000410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000480| 2d 2d 2d 0d 2f 2f 20 53 | 65 74 20 74 68 69 73 20 |---.// S|et this |
|00000490| 66 6c 61 67 20 74 6f 20 | 31 20 69 66 20 79 6f 75 |flag to |1 if you|
|000004a0| 20 77 61 6e 74 20 74 6f | 20 63 6f 6d 70 69 6c 65 | want to| compile|
|000004b0| 20 74 68 69 73 20 66 69 | 6c 65 20 69 6e 74 6f 20 | this fi|le into |
|000004c0| 61 20 73 74 61 6e 64 2d | 61 6c 6f 6e 65 20 72 65 |a stand-|alone re|
|000004d0| 73 6f 75 72 63 65 20 28 | 73 65 65 20 6e 6f 74 65 |source (|see note|
|000004e0| 20 62 65 6c 6f 77 29 2e | 0d 2f 2f 20 53 65 74 20 | below).|.// Set |
|000004f0| 69 74 20 74 6f 20 30 20 | 69 66 20 79 6f 75 20 77 |it to 0 |if you w|
|00000500| 61 6e 74 20 74 6f 20 69 | 6e 63 6c 75 64 65 20 74 |ant to i|nclude t|
|00000510| 68 69 73 20 73 6f 75 72 | 63 65 20 66 69 6c 65 20 |his sour|ce file |
|00000520| 69 6e 74 6f 20 79 6f 75 | 72 20 49 4e 49 54 20 70 |into you|r INIT p|
|00000530| 72 6f 6a 65 63 74 2e 0d | 0d 23 69 66 20 30 0d 23 |roject..|.#if 0.#|
|00000540| 64 65 66 69 6e 65 20 53 | 68 6f 77 49 6e 69 74 49 |define S|howInitI|
|00000550| 63 6f 6e 20 6d 61 69 6e | 0d 23 65 6e 64 69 66 0d |con main|.#endif.|
|00000560| 0d 2f 2f 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.// ----|--------|
|00000570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 2f 2f 20 54 68 65 |--------|-.// The|
|000005e0| 20 53 68 6f 77 49 4e 49 | 54 20 6d 65 63 68 61 6e | ShowINI|T mechan|
|000005f0| 69 73 6d 20 77 6f 72 6b | 73 20 62 79 20 68 61 76 |ism work|s by hav|
|00000600| 69 6e 67 20 65 61 63 68 | 20 49 4e 49 54 20 72 65 |ing each| INIT re|
|00000610| 61 64 2f 77 72 69 74 65 | 20 64 61 74 61 20 66 72 |ad/write| data fr|
|00000620| 6f 6d 20 74 68 65 73 65 | 20 67 6c 6f 62 61 6c 73 |om these| globals|
|00000630| 2e 0d 2f 2f 20 54 68 65 | 20 4d 50 57 20 43 20 63 |..// The| MPW C c|
|00000640| 6f 6d 70 69 6c 65 72 20 | 64 6f 65 73 6e 27 74 20 |ompiler |doesn't |
|00000650| 61 63 63 65 70 74 20 76 | 61 72 69 61 62 6c 65 73 |accept v|ariables|
|00000660| 20 64 65 63 6c 61 72 65 | 64 20 61 74 20 61 6e 20 | declare|d at an |
|00000670| 61 62 73 6f 6c 75 74 65 | 20 61 64 64 72 65 73 73 |absolute| address|
|00000680| 2c 20 73 6f 20 49 20 75 | 73 65 20 74 68 65 73 65 |, so I u|se these|
|00000690| 20 6d 61 63 72 6f 73 20 | 69 6e 73 74 65 61 64 2e | macros |instead.|
|000006a0| 0d 2f 2f 20 4f 6e 6c 79 | 20 6f 6e 65 20 6d 61 63 |.// Only| one mac|
|000006b0| 72 6f 20 69 73 20 64 65 | 66 69 6e 65 64 20 70 65 |ro is de|fined pe|
|000006c0| 72 20 76 61 72 69 61 62 | 6c 65 3b 20 74 68 65 72 |r variab|le; ther|
|000006d0| 65 20 69 73 20 6e 6f 20 | 6e 65 65 64 20 74 6f 20 |e is no |need to |
|000006e0| 64 65 66 69 6e 65 20 61 | 20 53 65 74 20 61 6e 64 |define a| Set and|
|000006f0| 20 61 20 47 65 74 20 61 | 63 63 65 73 73 6f 72 20 | a Get a|ccessor |
|00000700| 6c 69 6b 65 20 69 6e 20 | 3c 4c 6f 77 4d 65 6d 2e |like in |<LowMem.|
|00000710| 68 3e 2e 0d 0d 23 64 65 | 66 69 6e 65 09 4c 4d 56 |h>...#de|fine.LMV|
|00000720| 43 6f 6f 72 64 09 09 09 | 28 2a 20 28 73 68 6f 72 |Coord...|(* (shor|
|00000730| 74 2a 29 20 30 78 39 32 | 41 29 0d 23 64 65 66 69 |t*) 0x92|A).#defi|
|00000740| 6e 65 09 4c 4d 56 43 68 | 65 63 6b 53 75 6d 09 09 |ne.LMVCh|eckSum..|
|00000750| 28 2a 20 28 73 68 6f 72 | 74 2a 29 20 30 78 39 32 |(* (shor|t*) 0x92|
|00000760| 38 29 0d 23 64 65 66 69 | 6e 65 09 4c 4d 48 43 6f |8).#defi|ne.LMHCo|
|00000770| 6f 72 64 09 09 09 28 2a | 20 28 73 68 6f 72 74 2a |ord...(*| (short*|
|00000780| 29 20 30 78 39 32 43 29 | 0d 23 64 65 66 69 6e 65 |) 0x92C)|.#define|
|00000790| 09 4c 4d 48 43 68 65 63 | 6b 53 75 6d 09 09 28 2a |.LMHChec|kSum..(*|
|000007a0| 20 28 73 68 6f 72 74 2a | 29 20 30 78 39 32 45 29 | (short*|) 0x92E)|
|000007b0| 0d 0d 2f 2f 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..// ---|--------|
|000007c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2f 2f 20 50 72 |--------|--.// Pr|
|00000830| 6f 74 6f 74 79 70 65 73 | 20 66 6f 72 20 74 68 65 |ototypes| for the|
|00000840| 20 73 75 62 72 6f 75 74 | 69 6e 65 73 2e 20 54 68 | subrout|ines. Th|
|00000850| 65 20 6d 61 69 6e 20 72 | 6f 75 74 69 6e 65 20 63 |e main r|outine c|
|00000860| 6f 6d 65 73 20 66 69 72 | 73 74 3b 20 74 68 69 73 |omes fir|st; this|
|00000870| 20 69 73 20 6e 65 63 65 | 73 73 61 72 79 20 74 6f | is nece|ssary to|
|00000880| 20 6d 61 6b 65 20 54 48 | 49 4e 4b 20 43 27 73 20 | make TH|INK C's |
|00000890| 22 43 75 73 74 6f 6d 20 | 48 65 61 64 65 72 22 20 |"Custom |Header" |
|000008a0| 6f 70 74 69 6f 6e 20 77 | 6f 72 6b 2e 0d 0d 73 74 |option w|ork...st|
|000008b0| 61 74 69 63 20 75 6e 73 | 69 67 6e 65 64 20 73 68 |atic uns|igned sh|
|000008c0| 6f 72 74 20 43 68 65 63 | 6b 53 75 6d 20 28 75 6e |ort Chec|kSum (un|
|000008d0| 73 69 67 6e 65 64 20 73 | 68 6f 72 74 20 78 29 3b |signed s|hort x);|
|000008e0| 0d 73 74 61 74 69 63 20 | 76 6f 69 64 20 43 6f 6d |.static |void Com|
|000008f0| 70 75 74 65 49 63 6f 6e | 52 65 63 74 20 28 52 65 |puteIcon|Rect (Re|
|00000900| 63 74 2a 20 69 63 6f 6e | 52 65 63 74 2c 20 52 65 |ct* icon|Rect, Re|
|00000910| 63 74 2a 20 73 63 72 65 | 65 6e 42 6f 75 6e 64 73 |ct* scre|enBounds|
|00000920| 29 3b 0d 73 74 61 74 69 | 63 20 76 6f 69 64 20 41 |);.stati|c void A|
|00000930| 64 76 61 6e 63 65 49 63 | 6f 6e 50 6f 73 69 74 69 |dvanceIc|onPositi|
|00000940| 6f 6e 20 28 52 65 63 74 | 2a 20 69 63 6f 6e 52 65 |on (Rect|* iconRe|
|00000950| 63 74 29 3b 0d 73 74 61 | 74 69 63 20 76 6f 69 64 |ct);.sta|tic void|
|00000960| 20 44 72 61 77 42 57 49 | 63 6f 6e 20 28 73 68 6f | DrawBWI|con (sho|
|00000970| 72 74 20 69 63 6f 6e 49 | 44 2c 20 52 65 63 74 20 |rt iconI|D, Rect |
|00000980| 2a 69 63 6f 6e 52 65 63 | 74 29 3b 0d 0d 2f 2f 20 |*iconRec|t);..// |
|00000990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a00| 2d 2d 2d 2d 2d 0d 2f 2f | 20 4d 61 69 6e 20 72 6f |-----.//| Main ro|
|00000a10| 75 74 69 6e 65 2e 0d 0d | 74 79 70 65 64 65 66 20 |utine...|typedef |
|00000a20| 73 74 72 75 63 74 20 7b | 0d 09 51 44 47 6c 6f 62 |struct {|..QDGlob|
|00000a30| 61 6c 73 09 09 09 71 64 | 3b 09 09 09 09 09 09 09 |als...qd|;.......|
|00000a40| 09 09 2f 2f 20 53 74 6f | 72 61 67 65 20 66 6f 72 |..// Sto|rage for|
|00000a50| 20 74 68 65 20 51 75 69 | 63 6b 44 72 61 77 20 67 | the Qui|ckDraw g|
|00000a60| 6c 6f 62 61 6c 73 0d 09 | 6c 6f 6e 67 09 09 09 09 |lobals..|long....|
|00000a70| 71 64 47 6c 6f 62 61 6c | 73 50 74 72 3b 09 09 09 |qdGlobal|sPtr;...|
|00000a80| 09 09 09 09 2f 2f 20 41 | 35 20 70 6f 69 6e 74 73 |....// A|5 points|
|00000a90| 20 74 6f 20 74 68 69 73 | 20 70 6c 61 63 65 3b 20 | to this| place; |
|00000aa0| 69 74 20 77 69 6c 6c 20 | 63 6f 6e 74 61 69 6e 20 |it will |contain |
|00000ab0| 61 20 70 6f 69 6e 74 65 | 72 20 74 6f 20 71 64 0d |a pointe|r to qd.|
|00000ac0| 7d 20 51 44 53 74 6f 72 | 61 67 65 3b 0d 0d 70 61 |} QDStor|age;..pa|
|00000ad0| 73 63 61 6c 20 76 6f 69 | 64 20 53 68 6f 77 49 6e |scal voi|d ShowIn|
|00000ae0| 69 74 49 63 6f 6e 20 28 | 73 68 6f 72 74 20 69 63 |itIcon (|short ic|
|00000af0| 6f 6e 46 61 6d 69 6c 79 | 49 44 2c 20 42 6f 6f 6c |onFamily|ID, Bool|
|00000b00| 65 61 6e 20 61 64 76 61 | 6e 63 65 29 0d 7b 0d 09 |ean adva|nce).{..|
|00000b10| 6c 6f 6e 67 09 09 09 09 | 6f 6c 64 41 35 3b 09 09 |long....|oldA5;..|
|00000b20| 09 09 09 09 09 09 2f 2f | 20 4f 72 69 67 69 6e 61 |......//| Origina|
|00000b30| 6c 20 76 61 6c 75 65 20 | 6f 66 20 72 65 67 69 73 |l value |of regis|
|00000b40| 74 65 72 20 41 35 0d 09 | 51 44 53 74 6f 72 61 67 |ter A5..|QDStorag|
|00000b50| 65 09 09 09 71 64 73 3b | 09 09 09 09 09 09 09 09 |e...qds;|........|
|00000b60| 09 2f 2f 20 46 61 6b 65 | 20 51 44 20 67 6c 6f 62 |.// Fake| QD glob|
|00000b70| 61 6c 73 0d 09 43 47 72 | 61 66 50 6f 72 74 09 09 |als..CGr|afPort..|
|00000b80| 09 63 6f 6c 6f 72 50 6f | 72 74 3b 0d 09 47 72 61 |.colorPo|rt;..Gra|
|00000b90| 66 50 6f 72 74 09 09 09 | 62 77 50 6f 72 74 3b 0d |fPort...|bwPort;.|
|00000ba0| 09 52 65 63 74 09 09 09 | 09 64 65 73 74 52 65 63 |.Rect...|.destRec|
|00000bb0| 74 3b 0d 09 53 79 73 45 | 6e 76 52 65 63 09 09 65 |t;..SysE|nvRec..e|
|00000bc0| 6e 76 69 72 6f 6e 6d 65 | 6e 74 3b 09 09 09 09 09 |nvironme|nt;.....|
|00000bd0| 09 09 2f 2f 20 4d 61 63 | 68 69 6e 65 20 63 6f 6e |..// Mac|hine con|
|00000be0| 66 69 67 75 72 61 74 69 | 6f 6e 2e 0d 09 0d 09 6f |figurati|on.....o|
|00000bf0| 6c 64 41 35 20 3d 20 53 | 65 74 41 35 28 28 6c 6f |ldA5 = S|etA5((lo|
|00000c00| 6e 67 29 20 26 71 64 73 | 2e 71 64 47 6c 6f 62 61 |ng) &qds|.qdGloba|
|00000c10| 6c 73 50 74 72 29 3b 09 | 09 09 09 09 09 2f 2f 20 |lsPtr);.|.....// |
|00000c20| 54 65 6c 6c 20 41 35 20 | 74 6f 20 70 6f 69 6e 74 |Tell A5 |to point|
|00000c30| 20 74 6f 20 74 68 65 20 | 65 6e 64 20 6f 66 20 74 | to the |end of t|
|00000c40| 68 65 20 66 61 6b 65 20 | 51 44 20 47 6c 6f 62 61 |he fake |QD Globa|
|00000c50| 6c 73 0d 09 49 6e 69 74 | 47 72 61 66 28 26 71 64 |ls..Init|Graf(&qd|
|00000c60| 73 2e 71 64 2e 74 68 65 | 50 6f 72 74 29 3b 09 09 |s.qd.the|Port);..|
|00000c70| 09 09 09 09 09 09 2f 2f | 20 49 6e 69 74 69 61 6c |......//| Initial|
|00000c80| 69 7a 65 20 74 68 65 20 | 66 61 6b 65 20 51 44 20 |ize the |fake QD |
|00000c90| 47 6c 6f 62 61 6c 73 0d | 09 0d 09 53 79 73 45 6e |Globals.|...SysEn|
|00000ca0| 76 69 72 6f 6e 73 28 63 | 75 72 53 79 73 45 6e 76 |virons(c|urSysEnv|
|00000cb0| 56 65 72 73 2c 20 26 65 | 6e 76 69 72 6f 6e 6d 65 |Vers, &e|nvironme|
|00000cc0| 6e 74 29 3b 09 09 09 09 | 09 2f 2f 20 46 69 6e 64 |nt);....|.// Find|
|00000cd0| 20 6f 75 74 20 77 68 61 | 74 20 6b 69 6e 64 20 6f | out wha|t kind o|
|00000ce0| 66 20 6d 61 63 68 69 6e | 65 20 74 68 69 73 20 69 |f machin|e this i|
|00000cf0| 73 0d 0d 09 43 6f 6d 70 | 75 74 65 49 63 6f 6e 52 |s...Comp|uteIconR|
|00000d00| 65 63 74 28 26 64 65 73 | 74 52 65 63 74 2c 20 26 |ect(&des|tRect, &|
|00000d10| 71 64 73 2e 71 64 2e 73 | 63 72 65 65 6e 42 69 74 |qds.qd.s|creenBit|
|00000d20| 73 2e 62 6f 75 6e 64 73 | 29 3b 09 09 09 2f 2f 20 |s.bounds|);...// |
|00000d30| 43 6f 6d 70 75 74 65 20 | 77 68 65 72 65 20 74 68 |Compute |where th|
|00000d40| 65 20 69 63 6f 6e 20 73 | 68 6f 75 6c 64 20 62 65 |e icon s|hould be|
|00000d50| 20 64 72 61 77 6e 0d 0d | 09 69 66 20 28 65 6e 76 | drawn..|.if (env|
|00000d60| 69 72 6f 6e 6d 65 6e 74 | 2e 73 79 73 74 65 6d 56 |ironment|.systemV|
|00000d70| 65 72 73 69 6f 6e 20 3e | 3d 20 30 78 30 37 30 30 |ersion >|= 0x0700|
|00000d80| 20 26 26 20 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 2e | && envi|ronment.|
|00000d90| 68 61 73 43 6f 6c 6f 72 | 51 44 29 20 7b 0d 09 09 |hasColor|QD) {...|
|00000da0| 4f 70 65 6e 43 50 6f 72 | 74 28 26 63 6f 6c 6f 72 |OpenCPor|t(&color|
|00000db0| 50 6f 72 74 29 3b 0d 09 | 09 50 6c 6f 74 49 63 6f |Port);..|.PlotIco|
|00000dc0| 6e 49 44 28 26 64 65 73 | 74 52 65 63 74 2c 20 61 |nID(&des|tRect, a|
|00000dd0| 74 4e 6f 6e 65 2c 20 74 | 74 4e 6f 6e 65 2c 20 69 |tNone, t|tNone, i|
|00000de0| 63 6f 6e 46 61 6d 69 6c | 79 49 44 29 3b 0d 09 09 |conFamil|yID);...|
|00000df0| 43 6c 6f 73 65 43 50 6f | 72 74 28 26 63 6f 6c 6f |CloseCPo|rt(&colo|
|00000e00| 72 50 6f 72 74 29 3b 0d | 09 7d 0d 09 65 6c 73 65 |rPort);.|.}..else|
|00000e10| 20 7b 0d 09 09 4f 70 65 | 6e 50 6f 72 74 28 26 62 | {...Ope|nPort(&b|
|00000e20| 77 50 6f 72 74 29 3b 0d | 09 09 44 72 61 77 42 57 |wPort);.|..DrawBW|
|00000e30| 49 63 6f 6e 28 69 63 6f | 6e 46 61 6d 69 6c 79 49 |Icon(ico|nFamilyI|
|00000e40| 44 2c 20 26 64 65 73 74 | 52 65 63 74 29 3b 0d 09 |D, &dest|Rect);..|
|00000e50| 09 43 6c 6f 73 65 50 6f | 72 74 28 26 62 77 50 6f |.ClosePo|rt(&bwPo|
|00000e60| 72 74 29 3b 0d 09 7d 0d | 09 0d 09 69 66 20 28 61 |rt);..}.|...if (a|
|00000e70| 64 76 61 6e 63 65 29 0d | 09 09 41 64 76 61 6e 63 |dvance).|..Advanc|
|00000e80| 65 49 63 6f 6e 50 6f 73 | 69 74 69 6f 6e 20 28 26 |eIconPos|ition (&|
|00000e90| 64 65 73 74 52 65 63 74 | 29 3b 0d 09 09 0d 09 53 |destRect|);.....S|
|00000ea0| 65 74 41 35 28 6f 6c 64 | 41 35 29 3b 20 09 09 09 |etA5(old|A5); ...|
|00000eb0| 09 09 09 09 09 09 09 09 | 2f 2f 20 52 65 73 74 6f |........|// Resto|
|00000ec0| 72 65 20 41 35 20 74 6f | 20 69 74 73 20 70 72 65 |re A5 to| its pre|
|00000ed0| 76 69 6f 75 73 20 76 61 | 6c 75 65 0d 7d 0d 0d 2f |vious va|lue.}../|
|00000ee0| 2f 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/ ------|--------|
|00000ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f50| 2d 2d 2d 2d 2d 2d 2d 0d | 2f 2f 20 41 20 63 68 65 |-------.|// A che|
|00000f60| 63 6b 73 75 6d 20 69 73 | 20 75 73 65 64 20 74 6f |cksum is| used to|
|00000f70| 20 6d 61 6b 65 20 73 75 | 72 65 20 74 68 61 74 20 | make su|re that |
|00000f80| 74 68 65 20 64 61 74 61 | 20 69 6e 20 74 68 65 72 |the data| in ther|
|00000f90| 65 20 77 61 73 20 6c 65 | 66 74 20 62 79 20 61 6e |e was le|ft by an|
|00000fa0| 6f 74 68 65 72 20 53 68 | 6f 77 49 4e 49 54 2d 61 |other Sh|owINIT-a|
|00000fb0| 77 61 72 65 20 49 4e 49 | 54 2e 0d 0d 73 74 61 74 |ware INI|T...stat|
|00000fc0| 69 63 20 75 6e 73 69 67 | 6e 65 64 20 73 68 6f 72 |ic unsig|ned shor|
|00000fd0| 74 20 43 68 65 63 6b 53 | 75 6d 20 28 75 6e 73 69 |t CheckS|um (unsi|
|00000fe0| 67 6e 65 64 20 73 68 6f | 72 74 20 78 29 0d 7b 0d |gned sho|rt x).{.|
|00000ff0| 09 72 65 74 75 72 6e 20 | 28 28 78 20 3c 3c 20 31 |.return |((x << 1|
|00001000| 29 20 7c 20 28 78 20 3e | 3e 20 31 35 29 29 20 5e |) | (x >|> 15)) ^|
|00001010| 20 30 78 31 30 32 31 3b | 0d 7d 0d 0d 2f 2f 20 2d | 0x1021;|.}..// -|
|00001020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001090| 2d 2d 2d 2d 0d 2f 2f 20 | 43 6f 6d 70 75 74 65 49 |----.// |ComputeI|
|000010a0| 63 6f 6e 52 65 63 74 20 | 63 6f 6d 70 75 74 65 73 |conRect |computes|
|000010b0| 20 77 68 65 72 65 20 74 | 68 65 20 69 63 6f 6e 20 | where t|he icon |
|000010c0| 73 68 6f 75 6c 64 20 62 | 65 20 64 69 73 70 6c 61 |should b|e displa|
|000010d0| 79 65 64 2e 0d 0d 73 74 | 61 74 69 63 20 76 6f 69 |yed...st|atic voi|
|000010e0| 64 20 43 6f 6d 70 75 74 | 65 49 63 6f 6e 52 65 63 |d Comput|eIconRec|
|000010f0| 74 20 28 52 65 63 74 2a | 20 69 63 6f 6e 52 65 63 |t (Rect*| iconRec|
|00001100| 74 2c 20 52 65 63 74 2a | 20 73 63 72 65 65 6e 42 |t, Rect*| screenB|
|00001110| 6f 75 6e 64 73 29 0d 7b | 0d 09 69 66 20 28 43 68 |ounds).{|..if (Ch|
|00001120| 65 63 6b 53 75 6d 28 4c | 4d 48 43 6f 6f 72 64 29 |eckSum(L|MHCoord)|
|00001130| 20 21 3d 20 4c 4d 48 43 | 68 65 63 6b 53 75 6d 29 | != LMHC|heckSum)|
|00001140| 09 09 09 09 09 2f 2f 20 | 49 66 20 77 65 20 61 72 |.....// |If we ar|
|00001150| 65 20 66 69 72 73 74 2c | 20 77 65 20 6e 65 65 64 |e first,| we need|
|00001160| 20 74 6f 20 69 6e 69 74 | 69 61 6c 69 7a 65 20 74 | to init|ialize t|
|00001170| 68 65 20 73 68 61 72 65 | 64 20 64 61 74 61 2e 0d |he share|d data..|
|00001180| 09 09 4c 4d 48 43 6f 6f | 72 64 20 3d 20 38 3b 0d |..LMHCoo|rd = 8;.|
|00001190| 09 69 66 20 28 43 68 65 | 63 6b 53 75 6d 28 4c 4d |.if (Che|ckSum(LM|
|000011a0| 56 43 6f 6f 72 64 29 20 | 21 3d 20 4c 4d 56 43 68 |VCoord) |!= LMVCh|
|000011b0| 65 63 6b 53 75 6d 29 0d | 09 09 4c 4d 56 43 6f 6f |eckSum).|..LMVCoo|
|000011c0| 72 64 20 3d 20 73 63 72 | 65 65 6e 42 6f 75 6e 64 |rd = scr|eenBound|
|000011d0| 73 2d 3e 62 6f 74 74 6f | 6d 20 2d 20 34 30 3b 0d |s->botto|m - 40;.|
|000011e0| 09 0d 09 69 66 20 28 4c | 4d 48 43 6f 6f 72 64 20 |...if (L|MHCoord |
|000011f0| 2b 20 33 34 20 3e 20 73 | 63 72 65 65 6e 42 6f 75 |+ 34 > s|creenBou|
|00001200| 6e 64 73 2d 3e 72 69 67 | 68 74 29 20 7b 09 09 09 |nds->rig|ht) {...|
|00001210| 09 09 2f 2f 20 43 68 65 | 63 6b 20 77 68 65 74 68 |..// Che|ck wheth|
|00001220| 65 72 20 77 65 20 6d 75 | 73 74 20 77 72 61 70 0d |er we mu|st wrap.|
|00001230| 09 09 69 63 6f 6e 52 65 | 63 74 2d 3e 6c 65 66 74 |..iconRe|ct->left|
|00001240| 20 3d 20 38 3b 0d 09 09 | 69 63 6f 6e 52 65 63 74 | = 8;...|iconRect|
|00001250| 2d 3e 74 6f 70 20 3d 20 | 4c 4d 56 43 6f 6f 72 64 |->top = |LMVCoord|
|00001260| 20 2d 20 34 30 3b 0d 09 | 7d 0d 09 65 6c 73 65 20 | - 40;..|}..else |
|00001270| 7b 0d 09 09 69 63 6f 6e | 52 65 63 74 2d 3e 6c 65 |{...icon|Rect->le|
|00001280| 66 74 20 3d 20 4c 4d 48 | 43 6f 6f 72 64 3b 0d 09 |ft = LMH|Coord;..|
|00001290| 09 69 63 6f 6e 52 65 63 | 74 2d 3e 74 6f 70 20 3d |.iconRec|t->top =|
|000012a0| 20 4c 4d 56 43 6f 6f 72 | 64 3b 0d 09 7d 0d 09 69 | LMVCoor|d;..}..i|
|000012b0| 63 6f 6e 52 65 63 74 2d | 3e 72 69 67 68 74 20 3d |conRect-|>right =|
|000012c0| 20 69 63 6f 6e 52 65 63 | 74 2d 3e 6c 65 66 74 20 | iconRec|t->left |
|000012d0| 2b 20 33 32 3b 0d 09 69 | 63 6f 6e 52 65 63 74 2d |+ 32;..i|conRect-|
|000012e0| 3e 62 6f 74 74 6f 6d 20 | 3d 20 69 63 6f 6e 52 65 |>bottom |= iconRe|
|000012f0| 63 74 2d 3e 74 6f 70 20 | 2b 20 33 32 3b 0d 7d 0d |ct->top |+ 32;.}.|
|00001300| 0d 2f 2f 20 41 64 76 61 | 6e 63 65 49 63 6f 6e 50 |.// Adva|nceIconP|
|00001310| 6f 73 69 74 69 6f 6e 20 | 75 70 64 61 74 65 73 20 |osition |updates |
|00001320| 74 68 65 20 73 68 61 72 | 65 64 20 67 6c 6f 62 61 |the shar|ed globa|
|00001330| 6c 20 76 61 72 69 61 62 | 6c 65 73 20 73 6f 20 74 |l variab|les so t|
|00001340| 68 61 74 20 74 68 65 20 | 6e 65 78 74 20 65 78 74 |hat the |next ext|
|00001350| 65 6e 73 69 6f 6e 20 77 | 69 6c 6c 20 64 72 61 77 |ension w|ill draw|
|00001360| 20 69 74 73 20 69 63 6f | 6e 20 62 65 73 69 64 65 | its ico|n beside|
|00001370| 20 6f 75 72 73 2e 0d 0d | 73 74 61 74 69 63 20 76 | ours...|static v|
|00001380| 6f 69 64 20 41 64 76 61 | 6e 63 65 49 63 6f 6e 50 |oid Adva|nceIconP|
|00001390| 6f 73 69 74 69 6f 6e 20 | 28 52 65 63 74 2a 20 69 |osition |(Rect* i|
|000013a0| 63 6f 6e 52 65 63 74 29 | 0d 7b 0d 09 4c 4d 48 43 |conRect)|.{..LMHC|
|000013b0| 6f 6f 72 64 20 3d 20 69 | 63 6f 6e 52 65 63 74 2d |oord = i|conRect-|
|000013c0| 3e 6c 65 66 74 20 2b 20 | 34 30 3b 09 09 09 09 09 |>left + |40;.....|
|000013d0| 09 09 2f 2f 20 55 70 64 | 61 74 65 20 74 68 65 20 |..// Upd|ate the |
|000013e0| 73 68 61 72 65 64 20 64 | 61 74 61 0d 09 4c 4d 56 |shared d|ata..LMV|
|000013f0| 43 6f 6f 72 64 20 3d 20 | 69 63 6f 6e 52 65 63 74 |Coord = |iconRect|
|00001400| 2d 3e 74 6f 70 3b 0d 09 | 4c 4d 48 43 68 65 63 6b |->top;..|LMHCheck|
|00001410| 53 75 6d 20 3d 20 43 68 | 65 63 6b 53 75 6d 28 4c |Sum = Ch|eckSum(L|
|00001420| 4d 48 43 6f 6f 72 64 29 | 3b 0d 09 4c 4d 56 43 68 |MHCoord)|;..LMVCh|
|00001430| 65 63 6b 53 75 6d 20 3d | 20 43 68 65 63 6b 53 75 |eckSum =| CheckSu|
|00001440| 6d 28 4c 4d 56 43 6f 6f | 72 64 29 3b 0d 7d 0d 0d |m(LMVCoo|rd);.}..|
|00001450| 2f 2f 20 44 72 61 77 42 | 57 49 63 6f 6e 20 64 72 |// DrawB|WIcon dr|
|00001460| 61 77 73 20 74 68 65 20 | 27 49 43 4e 23 27 20 6d |aws the |'ICN#' m|
|00001470| 65 6d 62 65 72 20 6f 66 | 20 74 68 65 20 69 63 6f |ember of| the ico|
|00001480| 6e 20 66 61 6d 69 6c 79 | 2e 20 49 74 20 77 6f 72 |n family|. It wor|
|00001490| 6b 73 20 75 6e 64 65 72 | 20 53 79 73 74 65 6d 20 |ks under| System |
|000014a0| 36 2e 0d 0d 73 74 61 74 | 69 63 20 76 6f 69 64 20 |6...stat|ic void |
|000014b0| 44 72 61 77 42 57 49 63 | 6f 6e 20 28 73 68 6f 72 |DrawBWIc|on (shor|
|000014c0| 74 20 69 63 6f 6e 49 44 | 2c 20 52 65 63 74 20 2a |t iconID|, Rect *|
|000014d0| 69 63 6f 6e 52 65 63 74 | 29 0d 7b 0d 09 48 61 6e |iconRect|).{..Han|
|000014e0| 64 6c 65 09 09 69 63 6f | 6e 3b 0d 09 42 69 74 4d |dle..ico|n;..BitM|
|000014f0| 61 70 09 09 73 6f 75 72 | 63 65 2c 20 64 65 73 74 |ap..sour|ce, dest|
|00001500| 69 6e 61 74 69 6f 6e 3b | 0d 09 47 72 61 66 50 74 |ination;|..GrafPt|
|00001510| 72 09 09 70 6f 72 74 3b | 0d 09 0d 09 69 63 6f 6e |r..port;|....icon|
|00001520| 20 3d 20 47 65 74 31 52 | 65 73 6f 75 72 63 65 28 | = Get1R|esource(|
|00001530| 27 49 43 4e 23 27 2c 20 | 69 63 6f 6e 49 44 29 3b |'ICN#', |iconID);|
|00001540| 0d 09 69 66 20 28 69 63 | 6f 6e 20 21 3d 20 4e 55 |..if (ic|on != NU|
|00001550| 4c 4c 29 20 7b 0d 09 09 | 48 4c 6f 63 6b 28 69 63 |LL) {...|HLock(ic|
|00001560| 6f 6e 29 3b 0d 09 09 09 | 09 09 09 09 09 09 09 09 |on);....|........|
|00001570| 09 09 09 2f 2f 20 50 72 | 65 70 61 72 65 20 74 68 |...// Pr|epare th|
|00001580| 65 20 73 6f 75 72 63 65 | 20 61 6e 64 20 64 65 73 |e source| and des|
|00001590| 74 69 6e 61 74 69 6f 6e | 20 62 69 74 6d 61 70 73 |tination| bitmaps|
|000015a0| 2e 0d 09 09 73 6f 75 72 | 63 65 2e 62 61 73 65 41 |....sour|ce.baseA|
|000015b0| 64 64 72 20 3d 20 2a 69 | 63 6f 6e 20 2b 20 31 32 |ddr = *i|con + 12|
|000015c0| 38 3b 09 09 09 09 09 09 | 2f 2f 20 4d 61 73 6b 20 |8;......|// Mask |
|000015d0| 61 64 64 72 65 73 73 2e | 0d 09 09 73 6f 75 72 63 |address.|...sourc|
|000015e0| 65 2e 72 6f 77 42 79 74 | 65 73 20 3d 20 34 3b 0d |e.rowByt|es = 4;.|
|000015f0| 09 09 53 65 74 52 65 63 | 74 28 26 73 6f 75 72 63 |..SetRec|t(&sourc|
|00001600| 65 2e 62 6f 75 6e 64 73 | 2c 20 30 2c 20 30 2c 20 |e.bounds|, 0, 0, |
|00001610| 33 32 2c 20 33 32 29 3b | 0d 09 09 47 65 74 50 6f |32, 32);|...GetPo|
|00001620| 72 74 28 26 70 6f 72 74 | 29 3b 0d 09 09 64 65 73 |rt(&port|);...des|
|00001630| 74 69 6e 61 74 69 6f 6e | 20 3d 20 70 6f 72 74 2d |tination| = port-|
|00001640| 3e 70 6f 72 74 42 69 74 | 73 3b 0d 09 09 09 09 09 |>portBit|s;......|
|00001650| 09 09 09 09 09 09 09 09 | 09 2f 2f 20 54 72 61 6e |........|.// Tran|
|00001660| 73 66 65 72 20 74 68 65 | 20 6d 61 73 6b 2e 0d 09 |sfer the| mask...|
|00001670| 09 43 6f 70 79 42 69 74 | 73 28 26 73 6f 75 72 63 |.CopyBit|s(&sourc|
|00001680| 65 2c 20 26 64 65 73 74 | 69 6e 61 74 69 6f 6e 2c |e, &dest|ination,|
|00001690| 20 26 73 6f 75 72 63 65 | 2e 62 6f 75 6e 64 73 2c | &source|.bounds,|
|000016a0| 20 69 63 6f 6e 52 65 63 | 74 2c 20 73 72 63 42 69 | iconRec|t, srcBi|
|000016b0| 63 2c 20 6e 69 6c 29 3b | 0d 09 09 09 09 09 09 09 |c, nil);|........|
|000016c0| 09 09 09 09 09 09 09 2f | 2f 20 54 68 65 6e 20 74 |......./|/ Then t|
|000016d0| 68 65 20 69 63 6f 6e 2e | 0d 09 09 73 6f 75 72 63 |he icon.|...sourc|
|000016e0| 65 2e 62 61 73 65 41 64 | 64 72 20 3d 20 2a 69 63 |e.baseAd|dr = *ic|
|000016f0| 6f 6e 3b 0d 09 09 43 6f | 70 79 42 69 74 73 28 26 |on;...Co|pyBits(&|
|00001700| 73 6f 75 72 63 65 2c 20 | 26 64 65 73 74 69 6e 61 |source, |&destina|
|00001710| 74 69 6f 6e 2c 20 26 73 | 6f 75 72 63 65 2e 62 6f |tion, &s|ource.bo|
|00001720| 75 6e 64 73 2c 20 69 63 | 6f 6e 52 65 63 74 2c 20 |unds, ic|onRect, |
|00001730| 73 72 63 4f 72 2c 20 6e | 69 6c 29 3b 0d 09 7d 0d |srcOr, n|il);..}.|
|00001740| 7d 0d 0d 2f 2f 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..// --|--------|
|00001750| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 4e |--------|---.// N|
|000017c0| 6f 74 65 73 0d 0d 2f 2f | 20 43 68 65 63 6b 69 6e |otes..//| Checkin|
|000017d0| 67 20 66 6f 72 20 50 6c | 6f 74 49 63 6f 6e 49 44 |g for Pl|otIconID|
|000017e0| 3a 0d 2f 2f 20 57 65 20 | 28 50 4e 4c 29 20 6e 6f |:.// We |(PNL) no|
|000017f0| 77 20 63 68 65 63 6b 20 | 66 6f 72 20 73 79 73 74 |w check |for syst|
|00001800| 65 6d 20 37 20 61 6e 64 | 20 63 6f 6c 6f 75 72 20 |em 7 and| colour |
|00001810| 51 44 2c 20 61 6e 64 20 | 75 73 65 20 63 6f 6c 6f |QD, and |use colo|
|00001820| 75 72 20 67 72 61 66 20 | 70 6f 72 74 73 20 61 6e |ur graf |ports an|
|00001830| 64 20 50 6c 6f 74 49 63 | 6f 6e 49 44 20 6f 6e 6c |d PlotIc|onID onl|
|00001840| 79 20 69 66 20 62 6f 74 | 68 20 61 72 65 20 74 72 |y if bot|h are tr|
|00001850| 75 65 0d 2f 2f 20 4f 74 | 68 65 72 77 69 73 65 20 |ue.// Ot|herwise |
|00001860| 77 65 20 75 73 65 20 42 | 26 57 20 67 72 61 66 70 |we use B|&W grafp|
|00001870| 6f 72 74 20 61 6e 64 20 | 64 72 61 77 20 75 73 69 |ort and |draw usi|
|00001880| 6e 67 20 50 6c 6f 74 42 | 57 49 63 6f 6e 2e 0d 00 |ng PlotB|WIcon...|
|00001890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001900| 00 00 01 00 00 00 01 76 | 00 00 00 76 00 00 00 52 |.......v|...v...R|
|00001910| 76 65 72 73 69 6f 6e 20 | 31 2e 30 2e 34 2c 20 41 |version |1.0.4, A|
|00001920| 70 72 69 6c 20 32 35 74 | 68 2c 20 31 39 39 35 0d |pril 25t|h, 1995.|
|00001930| 0e 53 68 6f 77 49 6e 69 | 74 49 63 6f 6e 2e 63 49 |.ShowIni|tIcon.cI|
|00001940| 02 00 00 00 54 45 58 54 | 43 57 49 45 01 00 ff ff |....TEXT|CWIE....|
|00001950| 00 00 54 45 58 54 43 57 | 49 45 01 00 ff ff ff ff |..TEXTCW|IE......|
|00001960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001970| 00 00 ab c9 3d de 00 00 | 18 0f 00 00 01 c8 20 74 |....=...|...... t|
|00001980| 69 6d 65 2e 0d 0d 2f 2f | 20 49 20 68 61 76 65 20 |ime...//| I have |
|00001990| 66 6f 75 6e 64 20 74 68 | 61 74 20 74 68 65 72 65 |found th|at there|
|000019a0| 20 61 72 65 20 6d 61 6e | 79 20 73 6e 69 70 70 65 | are man|y snippe|
|000019b0| 74 73 20 6f 75 74 20 74 | 68 65 72 65 20 73 68 6f |ts out t|here sho|
|000019c0| 77 69 6e 67 20 68 6f 77 | 20 74 6f 20 64 6f 20 74 |wing how| to do t|
|000019d0| 68 69 73 2c 20 62 75 74 | 20 61 6c 6c 20 6f 66 20 |his, but| all of |
|000019e0| 74 68 6f 73 65 20 49 20 | 74 72 69 65 64 20 77 65 |those I |tried we|
|000019f0| 72 65 20 75 6e 6e 65 63 | 65 73 73 61 72 69 6c 79 |re unnec|essarily|
|00001a00| 00 00 00 1e 00 78 00 18 | 02 6d 02 fd 00 78 00 18 |.....x..|.m...x..|
|00001a10| 02 6d 02 fd 00 00 00 00 | 00 00 00 00 00 00 00 00 |.m......|........|
|00001a20| 00 00 00 00 00 48 00 09 | 4d 6f 6e 61 63 6f 00 00 |.....H..|Monaco..|
|00001a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a40| 00 00 00 00 00 00 00 00 | 00 03 00 04 00 32 00 14 |........|.....2..|
|00001a50| 02 32 02 cb 00 32 00 14 | 02 32 02 cb ae b0 e5 83 |.2...2..|.2......|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00001a70| 00 04 00 01 00 01 00 00 | 01 00 00 00 01 76 00 00 |........|.....v..|
|00001a80| 00 76 00 00 00 52 03 7c | dc 18 20 b0 00 00 00 1c |.v...R.||.. .....|
|00001a90| 00 52 00 01 4d 50 53 52 | 00 01 00 12 4d 57 42 42 |.R..MPSR|....MWBB|
|00001aa0| 00 00 00 2a 03 f0 ff ff | 00 00 00 00 00 00 00 00 |...*....|........|
|00001ab0| 03 ed ff ff 00 00 00 22 | 00 00 00 00 03 f0 ff ff |......."|........|
|00001ac0| 00 00 00 6e 00 00 00 00 | 00 00 00 00 00 00 00 00 |...n....|........|
|00001ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+